object frmShowSupplier: TfrmShowSupplier
  Left = 0
  Top = 0
  ClientHeight = 427
  ClientWidth = 816
  Caption = 'frmShowSupplier'
  OldCreateOrder = False
  MonitoredKeys.Keys = <>
  PixelsPerInch = 96
  TextHeight = 13
  object UniToolBar1: TUniToolBar
    Left = 0
    Top = 0
    Width = 816
    Height = 45
    Hint = ''
    ButtonHeight = 45
    ButtonWidth = 60
    ShowCaptions = True
    TabOrder = 0
    ParentColor = False
    Color = clBtnFace
    object tbQuery: TUniToolButton
      Left = 0
      Top = 0
      Hint = ''
      ImageIndex = 10
      Caption = #26597#35810
      TabOrder = 1
      OnClick = tbQueryClick
    end
    object UniToolButton2: TUniToolButton
      Left = 60
      Top = 0
      Width = 8
      Hint = ''
      Style = tbsSeparator
      Caption = 'UniToolButton2'
      TabOrder = 2
    end
    object tbOK: TUniToolButton
      Left = 68
      Top = 0
      Hint = ''
      ImageIndex = 7
      Caption = #30830#23450
      TabOrder = 4
      OnClick = tbOKClick
    end
    object tbCancel: TUniToolButton
      Left = 128
      Top = 0
      Hint = ''
      Caption = #21462#28040
      TabOrder = 6
      OnClick = tbCancelClick
    end
    object UniToolButton4: TUniToolButton
      Left = 188
      Top = 0
      Width = 8
      Hint = ''
      Style = tbsSeparator
      Caption = 'UniToolButton4'
      TabOrder = 5
    end
    object tbClose: TUniToolButton
      Left = 196
      Top = 0
      Hint = ''
      ImageIndex = 41
      Caption = #20851#38381
      TabOrder = 3
      OnClick = tbCloseClick
    end
  end
  object UniPanel3: TUniPanel
    Left = 0
    Top = 45
    Width = 816
    Height = 55
    Hint = ''
    Align = alTop
    TabOrder = 1
    Caption = ''
    object edSiteFlags: TUniEdit
      Left = 210
      Top = 15
      Width = 60
      Hint = ''
      Text = ''
      TabOrder = 1
    end
    object UniLabel1: TUniLabel
      Left = 180
      Top = 20
      Width = 24
      Height = 13
      Hint = ''
      Caption = #32452#32455
      TabOrder = 4
    end
    object edSupplier: TUniEdit
      Left = 70
      Top = 15
      Width = 80
      Hint = ''
      Text = ''
      TabOrder = 0
    end
    object UniLabel2: TUniLabel
      Left = 5
      Top = 20
      Width = 60
      Height = 13
      Hint = ''
      Caption = #20379#24212#21830#32534#21495
      TabOrder = 5
    end
    object edSupplierName: TUniEdit
      Left = 360
      Top = 15
      Width = 200
      Hint = ''
      Text = ''
      TabOrder = 2
    end
    object UniLabel3: TUniLabel
      Left = 295
      Top = 20
      Width = 60
      Height = 13
      Hint = ''
      Caption = #20379#24212#21830#21517#31216
      TabOrder = 6
    end
  end
  object UniPanel2: TUniPanel
    Left = 0
    Top = 100
    Width = 816
    Height = 327
    Hint = ''
    Align = alClient
    TabOrder = 2
    Caption = ''
    object UniDBGrid1: TUniDBGrid
      Left = 1
      Top = 1
      Width = 814
      Height = 325
      Hint = ''
      DataSource = dsspl_mst
      ReadOnly = True
      LoadMask.Message = 'Loading data...'
      Align = alClient
      TabOrder = 1
      OnDblClick = UniDBGrid1DblClick
      Columns = <
        item
          FieldName = 'spl_site_flags'
          Title.Alignment = taCenter
          Title.Caption = #32452#32455
          Width = 50
          ReadOnly = True
        end
        item
          FieldName = 'spl_no'
          Title.Alignment = taCenter
          Title.Caption = #23458#25143#32534#21495
          Width = 100
          ReadOnly = True
        end
        item
          FieldName = 'spl_name'
          Title.Alignment = taCenter
          Title.Caption = #23458#25143#21517#31216
          Width = 200
          ReadOnly = True
        end
        item
          FieldName = 'spl_short_name'
          Title.Alignment = taCenter
          Title.Caption = #31616#31216
          Width = 100
          ReadOnly = True
        end
        item
          FieldName = 'spl_flags'
          Title.Alignment = taCenter
          Title.Caption = #29366#24577
          Width = 50
          ReadOnly = True
        end
        item
          FieldName = 'adds_province'
          Title.Alignment = taCenter
          Title.Caption = #30465
          Width = 80
          ReadOnly = True
        end
        item
          FieldName = 'adds_locality'
          Title.Alignment = taCenter
          Title.Caption = #24066
          Width = 80
          ReadOnly = True
        end
        item
          FieldName = 'adds_county'
          Title.Alignment = taCenter
          Title.Caption = #21306'('#21439')'
          Width = 80
          ReadOnly = True
        end
        item
          FieldName = 'adds_address'
          Title.Alignment = taCenter
          Title.Caption = #22320#22336
          Width = 200
          ReadOnly = True
        end
        item
          FieldName = 'adds_attn'
          Title.Alignment = taCenter
          Title.Caption = #32852#31995#20154
          Width = 100
          ReadOnly = True
        end
        item
          FieldName = 'adds_tel'
          Title.Alignment = taCenter
          Title.Caption = #30005#35805
          Width = 100
          ReadOnly = True
        end
        item
          FieldName = 'adds_mobile'
          Title.Alignment = taCenter
          Title.Caption = #31227#21160#30005#35805
          Width = 100
          ReadOnly = True
        end
        item
          FieldName = 'adds_fax'
          Title.Alignment = taCenter
          Title.Caption = #20256#30495
          Width = 100
          ReadOnly = True
        end
        item
          FieldName = 'adds_mobile'
          Title.Alignment = taCenter
          Title.Caption = #31227#21160#30005#35805
          Width = 100
          ReadOnly = True
        end
        item
          FieldName = 'adds_flags'
          Title.Alignment = taCenter
          Title.Caption = #29366#24577
          Width = 50
          ReadOnly = True
        end>
    end
  end
  object dsspl_mst: TDataSource
    DataSet = zqspl_mst
    Left = 304
    Top = 160
  end
  object zqspl_mst: TZQuery
    Connection = UniMainModule.zDB
    SortedFields = 'spl_no'
    ReadOnly = True
    SQL.Strings = (
      'select'
      '  S.*, A.*'
      'from spl_mst as S'
      '  left join ('
      '    select * from adds_mst'
      '    where adds_flags = 1'
      '  ) as A'
      '    on (S.spl_snowflake = A.adds_class_snowflake)'
      'where S.spl_snowflake > 0'
      
        '  and cast(cast(S.spl_flags as bit(8)) & cast(1 as bit(8)) as in' +
        'teger) = 1')
    Params = <>
    IndexFieldNames = 'spl_no Asc'
    Left = 248
    Top = 160
    object zqspl_mstspl_snowflake: TLargeintField
      FieldName = 'spl_snowflake'
      ReadOnly = True
    end
    object zqspl_mstspl_site_flags: TIntegerField
      DisplayLabel = #32452#32455
      FieldName = 'spl_site_flags'
      ReadOnly = True
    end
    object zqspl_mstspl_no: TWideStringField
      DisplayLabel = #20379#24212#21830#32534#21495
      FieldName = 'spl_no'
      ReadOnly = True
      Size = 16
    end
    object zqspl_mstspl_name: TWideStringField
      DisplayLabel = #20379#24212#21830#21517#31216
      FieldName = 'spl_name'
      ReadOnly = True
      Size = 64
    end
    object zqspl_mstspl_short_name: TWideStringField
      DisplayLabel = #31616#31216
      FieldName = 'spl_short_name'
      ReadOnly = True
      Size = 24
    end
    object zqspl_mstspl_adds_snowflake: TLargeintField
      FieldName = 'spl_adds_snowflake'
      ReadOnly = True
    end
    object zqspl_mstspl_update_time: TDateTimeField
      FieldName = 'spl_update_time'
      ReadOnly = True
    end
    object zqspl_mstspl_flags: TIntegerField
      DisplayLabel = #26631#35782
      FieldName = 'spl_flags'
      ReadOnly = True
    end
    object zqspl_mstadds_class_snowflake: TLargeintField
      FieldName = 'adds_class_snowflake'
      ReadOnly = True
    end
    object zqspl_mstadds_snowflake: TLargeintField
      DisplayLabel = 'Adds ID'
      FieldName = 'adds_snowflake'
      ReadOnly = True
    end
    object zqspl_mstadds_province: TWideStringField
      DisplayLabel = #30465
      FieldName = 'adds_province'
      ReadOnly = True
      Size = 64
    end
    object zqspl_mstadds_locality: TWideStringField
      DisplayLabel = #24066
      FieldName = 'adds_locality'
      ReadOnly = True
      Size = 64
    end
    object zqspl_mstadds_county: TWideStringField
      DisplayLabel = #21306'('#21439')'
      FieldName = 'adds_county'
      ReadOnly = True
      Size = 64
    end
    object zqspl_mstadds_address: TWideStringField
      DisplayLabel = #22320#22336
      FieldName = 'adds_address'
      ReadOnly = True
      Size = 256
    end
    object zqspl_mstadds_attn: TWideStringField
      DisplayLabel = #32852#31995#20154
      FieldName = 'adds_attn'
      ReadOnly = True
      Size = 32
    end
    object zqspl_mstadds_tel: TWideStringField
      DisplayLabel = #30005#35805
      FieldName = 'adds_tel'
      ReadOnly = True
      Size = 32
    end
    object zqspl_mstadds_mobile: TWideStringField
      DisplayLabel = #31227#21160#30005#35805
      FieldName = 'adds_mobile'
      ReadOnly = True
      Size = 32
    end
    object zqspl_mstadds_fax: TWideStringField
      DisplayLabel = #20256#30495
      FieldName = 'adds_fax'
      ReadOnly = True
      Size = 32
    end
    object zqspl_mstadds_email: TWideStringField
      DisplayLabel = #37038#31665
      FieldName = 'adds_email'
      ReadOnly = True
      Size = 32
    end
    object zqspl_mstadds_flags: TIntegerField
      DisplayLabel = #29366#24577
      FieldName = 'adds_flags'
      ReadOnly = True
    end
  end
end
